home *** CD-ROM | disk | FTP | other *** search
/ Aminet 48 / Aminet 48 (2002)(GTI - Schatztruhe)[!][Apr 2002].iso / Aminet / text / edit / vim60rt.lha / Vim / vim60 / syntax / dylan.vim < prev    next >
Encoding:
Text File  |  2001-05-09  |  4.3 KB  |  129 lines
  1. " Vim syntax file
  2. " Language:    Dylan
  3. " Authors:    Justus Pendleton <justus@acm.org>
  4. "        Brent A. Fulgham <bfulgham@debian.org>
  5. " Last Change:    Fri Sep 29 13:45:55 PDT 2000
  6. "
  7. " This syntax file is based on the Haskell, Perl, Scheme, and C
  8. " syntax files.
  9.  
  10. " Part 1:  Syntax definition
  11. " For version 5.x: Clear all syntax items
  12. " For version 6.x: Quit when a syntax file was already loaded
  13. if version < 600
  14.   syntax clear
  15. elseif exists("b:current_syntax")
  16.   finish
  17. endif
  18.  
  19. syn case ignore
  20.  
  21. if version < 600
  22.   set lisp
  23. else
  24.   setlocal lisp
  25. endif
  26.  
  27. " Highlight special characters (those that have backslashes) differently
  28. syn match    dylanSpecial        display contained "\\\(x\x\+\|\o\{1,3}\|.\|$\)"
  29.  
  30. " Keywords
  31. syn keyword    dylanUnnamedDefs    interface
  32. syn keyword    dylanNamedDefs        library macro
  33. syn keyword    dylanParamDefs        method class function
  34. syn keyword    dylanBlock        cleanup block afterwards end
  35. syn keyword    dylanSimpleDefs        constant variable generic primary
  36. syn keyword    dylanStatement        begin method
  37. syn keyword    dylanOther        above below from by in instance local
  38. syn keyword    dylanOther        slot subclass then to virtual
  39. syn keyword    dylanConditional    if when select case else elseif unless
  40. syn keyword    dylanConditional    finally otherwise then
  41. syn keyword    dylanRepeat        for until while from to
  42. syn keyword    dylanStatement        define let
  43. " how to match labels within select and case?
  44. " finally is a label for for loops
  45. syn keyword    dylanLabel        otherwise finally
  46. " signal is a method, not really a keyword
  47. syn keyword    dylanException        exception handler
  48. syn keyword    dylanException        signal
  49. syn keyword    dylanImport        import rename create
  50. syn keyword    dylanPreProc        use export exclude
  51. syn keyword    dylanClassMods        abstract concrete primary inherited
  52. syn keyword    dylanMethMods        inline
  53. syn keyword    dylanMiscMods        open sealed domain singleton
  54.  
  55. " Matching rules for special forms
  56. syn match    dylanOperator        "\s[-!%&\*\+/=\?@\\^|~.]\=[-!%&\*\+=\?@\\^|~:.]\=[->!%&\*\+=\?@\\^|~:.]"
  57. syn match    dylanOperator        "\(\<[A-Z][a-zA-Z0-9_']*\.\)\=:[-!#$%&\*\+./=\?@\\^|~:]*"
  58. " Numbers
  59. syn match    dylanNumber        "\<[0-9]\+\>\|\<0[xX][0-9a-fA-F]\+\>\|\<0[oO][0-7]\+\>"
  60. syn match    dylanNumber        "\<[0-9]\+\.[0-9]\+\([eE][-+]\=[0-9]\+\)\=\>"
  61. " Booleans
  62. syn match    dylanBoolean        "#t\|#f"
  63. " Comments
  64. syn match    dylanComment        "//.*"
  65. syn region    dylanComment        start="/\*" end="\*/"
  66. " Strings
  67. syn region    dylanString        start=+"+ skip=+\\\\\|\\"+ end=+"+ contains=dySpecial
  68. syn match    dylanCharacter        "'[^\\]'"
  69. " Constants, classes, and variables
  70. syn match    dylanConstant        "$\<[a-zA-Z0-9\-]\+\>"
  71. syn match    dylanClass        "<\<[a-zA-Z0-9\-]\+\>>"
  72. syn match    dylanVariable        "\*\<[a-zA-Z0-9\-]\+\>\*"
  73. " Preconditions
  74. syn region    dylanPrecondit        start="^\s*#\s*\(if\>\|else\>\|endif\>\)" skip="\\$" end="$"
  75.  
  76. " These appear at the top of files (usually).  I like to highlight the whole line
  77. " so that the definition stands out.  They should probably really be keywords, but they
  78. " don't generally appear in the middle of a line of code.
  79. syn match    dylanHeader    "^[Mm]odule:.*$"
  80. syn match    dylanHeader    "^[Aa]uthor:.*$"
  81. syn match    dylanHeader    "^[Cc]opyright:.*$"
  82. syn match    dylanHeader    "^[Ss]ynopsis:.*$"
  83.  
  84. " Define the default highlighting.
  85. " For version 5.7 and earlier: only when not done already
  86. " For version 5.8 and later: only when an item doesn't have highlighting yet
  87. if version >= 508 || !exists("did_dylan_syntax_inits")
  88.   if version < 508
  89.     let did_dylan_syntax_inits = 1
  90.     command -nargs=+ HiLink hi link <args>
  91.   else
  92.     command -nargs=+ HiLink hi def link <args>
  93.   endif
  94.  
  95.   HiLink dylanComment        Comment
  96.   HiLink dylanConstant        Constant
  97.   HiLink dylanString        String
  98.   HiLink dylanCharacter        Character
  99.   HiLink dylanNumber        Number
  100.   HiLink dylanBoolean        Boolean
  101.   HiLink dylanClass        Structure
  102.   HiLink dylanVariable        Identifier
  103.   HiLink dylanConditional    Conditional
  104.   HiLink dylanRepeat        Repeat
  105.   HiLink dylanLabel        Label
  106.   HiLink dylanOperator        Operator
  107.   HiLink dylanUnnamedDefs    Keyword
  108.   HiLink dylanNamedDefs        Keyword
  109.   HiLink dylanParamDefs        Keyword
  110.   HiLink dylanBlock        Structure
  111.   HiLink dylanSimpleDefs    Keyword
  112.   HiLink dylanStatement        Statement
  113.   HiLink dylanOther        Keyword
  114.   HiLink dylanException        Exception
  115.   HiLink dylanClassMods        StorageClass
  116.   HiLink dylanMethMods        StorageClass
  117.   HiLink dylanMiscMods        StorageClass
  118.   HiLink dylanImport        Include
  119.   HiLink dylanPreProc        PreProc
  120.   HiLink dylanPrecondit        PreCondit
  121.   HiLink dylanHeader        Macro
  122.  
  123.   delcommand HiLink
  124. endif
  125.  
  126. let b:current_syntax = "dylan"
  127.  
  128. " vim:ts=8
  129.